(ccl_driver): If ccl->quit_silently is nonzero, don't

append "CCL: Quitted" when the CCL program is quitted.
(setup_ccl_program): Initialize ccl->quit_silently to zero.

diff --git a/src/ccl.c b/src/ccl.c
index f0c078228df18bf47b1dac487e7d4d4fad1c0f49..19637e01fca0853b98c7b144f2691fe35de6bfb2 100644 (file)
--- a/src/ccl.c
+++ b/src/ccl.c
@@ -1909,7 +1909,8 @@ ccl_driver (ccl, source, destination, src_bytes, dst_bytes, consumed)
          break;
 
        case CCL_STAT_QUIT:
-         sprintf(msg, "\nCCL: Quited.");
+         if (! ccl->quit_silently)
+           sprintf(msg, "\nCCL: Quited.");
          break;
 
        default:
@@ -2112,6 +2113,7 @@ setup_ccl_program (ccl, ccl_prog)
   ccl->eol_type = CODING_EOL_LF;
   ccl->suppress_error = 0;
   ccl->eight_bit_control = 0;
+  ccl->quit_silently = 0;
   return 0;
 }